﻿Public Class NFR_00
    Public Function guardarFR00(ByVal item As Entidades.EFR_00) As Boolean
        Dim oDatos As New Datos.DFR_00
        Dim oFR00 As New List(Of Entidades.EFR_00)
        Dim band As Boolean
        Try
            band = oDatos.guardar(item)
        Catch ex As Exception
            Throw New ArgumentException(ex.Message)
        Finally
            oDatos = Nothing
        End Try
        Return band
    End Function
    Public Function modificarFR00(ByVal item As Entidades.EFR_00) As Boolean
        Dim oDatos As New Datos.DFR_00
        Dim oFR00 As New List(Of Entidades.EFR_00)
        Dim band As Boolean
        Try
            band = oDatos.guardar(item)
        Catch ex As Exception
            Throw New ArgumentException(ex.Message)
        Finally
            oDatos = Nothing
        End Try
        Return band
    End Function
End Class
